home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2000 September / september_2000.iso / intercd / root / ^Linux / cdrtools-1.10 / lib / jsprintf.c < prev    next >
Encoding:
C/C++ Source or Header  |  2000-05-07  |  2.5 KB  |  123 lines
  1. /* @(#)jsprintf.c    1.13 00/05/07 Copyright 1985 J. Schilling */
  2. /*
  3.  *    Copyright (c) 1985 J. Schilling
  4.  */
  5. /*
  6.  * This program is free software; you can redistribute it and/or modify
  7.  * it under the terms of the GNU General Public License as published by
  8.  * the Free Software Foundation; either version 2, or (at your option)
  9.  * any later version.
  10.  *
  11.  * This program is distributed in the hope that it will be useful,
  12.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.  * GNU General Public License for more details.
  15.  *
  16.  * You should have received a copy of the GNU General Public License
  17.  * along with this program; see the file COPYING.  If not, write to
  18.  * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  19.  */
  20.  
  21. #include <mconfig.h>
  22. #include <stdio.h>
  23. #include <vadefs.h>
  24. #include <standard.h>
  25. #include <schily.h>
  26.  
  27. #define BFSIZ    256
  28.  
  29. typedef struct {
  30.     short    cnt;
  31.     char    *ptr;
  32.     char    buf[BFSIZ];
  33.     int    count;
  34.     FILE    *f;
  35. } *BUF, _BUF;
  36.  
  37. LOCAL    void    _bflush        __PR((BUF));
  38. LOCAL    void    _bput        __PR((char, long));
  39. EXPORT    int    js_fprintf    __PR((FILE *, const char *, ...));
  40. EXPORT    int    js_printf    __PR((const char *, ...));
  41.  
  42. LOCAL void _bflush (bp)
  43.     register BUF    bp;
  44. {
  45.     bp->count += bp->ptr - bp->buf;
  46.     if (filewrite (bp->f, bp->buf, bp->ptr - bp->buf) < 0)
  47.         bp->count = EOF;
  48.     bp->ptr = bp->buf;
  49.     bp->cnt = BFSIZ;
  50. }
  51.  
  52. #ifdef    PROTOTYPES
  53. LOCAL void _bput (char c, long l)
  54. #else
  55. LOCAL void _bput (c, l)
  56.         char    c;
  57.         long    l;
  58. #endif
  59. { 
  60.     register BUF    bp = (BUF)l;
  61.  
  62.     *bp->ptr++ = c;
  63.     if (--bp->cnt <= 0)
  64.         _bflush (bp);
  65. }
  66.  
  67. /* VARARGS2 */
  68. #ifdef    PROTOTYPES
  69. EXPORT int js_printf(const char *form, ...)
  70. #else
  71. EXPORT int js_printf(form, va_alist)
  72.     char    *form;
  73.     va_dcl
  74. #endif
  75. {
  76.     va_list    args;
  77.     _BUF    bb;
  78.  
  79.     bb.ptr = bb.buf;
  80.     bb.cnt = BFSIZ;
  81.     bb.count = 0;
  82.     bb.f = stdout;
  83. #ifdef    PROTOTYPES
  84.     va_start(args, form);
  85. #else
  86.     va_start(args);
  87. #endif
  88.     format(_bput, (long)&bb, form, args);
  89.     va_end(args);
  90.     if (bb.cnt < BFSIZ)
  91.         _bflush (&bb);
  92.     return (bb.count);
  93. }
  94.  
  95. /* VARARGS3 */
  96. #ifdef    PROTOTYPES
  97. EXPORT int js_fprintf(FILE *file, const char *form, ...)
  98. #else
  99. EXPORT int js_fprintf(file, form, va_alist)
  100.     FILE    *file;
  101.     char    *form;
  102.     va_dcl
  103. #endif
  104. {
  105.     va_list    args;
  106.     _BUF    bb;
  107.  
  108.     bb.ptr = bb.buf;
  109.     bb.cnt = BFSIZ;
  110.     bb.count = 0;
  111.     bb.f = file;
  112. #ifdef    PROTOTYPES
  113.     va_start(args, form);
  114. #else
  115.     va_start(args);
  116. #endif
  117.     format(_bput, (long)&bb, form, args);
  118.     va_end(args);
  119.     if (bb.cnt < BFSIZ)
  120.         _bflush (&bb);
  121.     return (bb.count);
  122. }
  123.